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Abstract 

The incremental approach to modular monadic semantics constructs complex 
monads by using monad transformers to add computational features to a pre- 
existing monad. A complication of this approach is that the operations associ- 
ated to the pre-existing monad need to be lifted to the new monad. 

In a companion paper by Jaskelioff, the lifting problem has been addressed 
in the setting of system Fu. Here, we recast and extend those results in a 
category-theoretic setting. We abstract and generalize from monads to monoids 
(in a monoidal category), and from monad transformers to monoid transformers. 
The generalization brings more simplicity and clarity, and opens the way for 
lifting of operations with applicability beyond monads. 
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1. Introduction 

Since monads have been proposed to model computational effects [31, 32], 
they have proven to be extremely useful also to structure functional programs 
[42, 41, 18]. In these applications monads come with operations to manipulate 
the computational effects they model. For example, an exception monad may 
come with operations for throwing an exception and for handling it, and a 
state monad may come with operations for reading and updating the state. 
Consequently, the structures one is really working with are monads and a set 
of operations associated to them. The monadic approach to the denotational 
semantics of a programming language, which has been adapted also to other 
forms of programming language semantics based on interpreters [25] or compilers 
[24], consists of three steps [33, 7]: 
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identify a metalanguage with computational types, to hide the interpreta- 
tion of computational types and operations manipulating computations-, 

define a translation of the programming language into the metalanguage; 


• give a denotational semantics of the metalanguage, by interpreting com- 
putational types and operations on computations using a monad and a set 
of operations associated to it. 

However, there is a caveat: when the programming language involves a mixture 
of computational effects, the number of operations for manipulating compu- 
tations grows, the monad needed to interpret computational types gets more 
complex, and the semantics of operations associated to it gets more complex, 
too. To tackle these issues one can adopt a modular approach, which provides 
basic building blocks and constructs to build more complex blocks. Roughly 
speaking, one can identify two modular approaches 

• the incremental approach, taken in [25, 33, 7], uses unary constructs, called 
monad transformers, which build complex monads by adding one compu- 
tational feature to a pre-existing monad; 

• the compositional approach, taken in [27, 15], uses binary constructs, called 
monad combinations 2 , for combining two pre-existing monads. 

Both approaches fall short in dealing with operations associated to monads. 
This problem was identified in [25], which proposed a non-modular workaround, 
namely to lift in an ad-hoc manner an operation through a monad transformer. 
Therefore, the number of liftings grows like the product of the number of monad 
transformers and operations involved. Alternatively, one may achieve modular- 
ity by restricting the format of operations. For instance, algebraic operations in 
the sense of [35] are easy to lift, but the monadic approach becomes of limited 
applicability if all operations have to be algebraic. 

The compositional approach fits with the algebraic view of computational 
effects advocated in [35], and the combinations proposed in [15] give natural 
ways to combine monads induced by algebraic theories and to lift algebraic 
operations. However, some computational monads are not induced by algebraic 
theories, and some operations on computations are not algebraic. 

The incremental approach is popular among functional programmers, be- 
cause monad transformers are easy to implement. However, there has been lim- 
ited progress in addressing the lifting problem, until a new insight was brought 
by [16, 17]. Jaskelioff gives a uniform way of lifting operations in a certain 
class (which includes all the operations described in [25]) through any functo- 
rial monad transformer. This lifting has been implemented in Haskell [16] and 
studied in the setting of system Flo [17]. On algebraic operations it agrees with 
the straigthforward lifting, and it is compatible with most of the ad-hoc liftings 
found in the literature or in Haskell’s libraries. 


2 In the context of [15] it is 


appropriate to call them theory combinations. 
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Lifting Theorems and their applicability 

Assumptions on operation op and transformer T for lifting op through T 


op 

T 

Lifting theorem 

algebraic 

basic 

Thm 3.4 (applies more generally to monoid maps) 

first-order 

functorial 

Thm 5.5 for monoidal category with exponentials 

first-order 

monoidal 

Thm 5.2 (applies to a more general form of op) 


Figure 1: Applicability of Lifting Theorems 


Contributions. Our main contribution is to develop a theory of monoid trans- 
formers and lifting of operations in a categorical setting, that gener- 
alises, clarifies, and extends the current theory of monad transformers [25, 33, 
7, 17]. Category theory is known for its ability to abstract and generalize. We 
make good use of it, by developing a theory of lifting for monoid transformers, 
where monoids are taken in an unspecified monoidal category. 

By a suitable choice of monoidal category, the theory specializes to monads, 
strong monads, finitary monads aka algebraic theories, and monads realizable 
in a typed or untyped calculus (such as system Flu or partial combinatory 
logic). Also other structures generalizing strong monads (such as arrows [14] 
and Freyd’s categories [39]) are monoids in suitable monoidal categories [13, 2]. 
Therefore, the theory may have a wider applicability. 

Note for Readers. We assume a modest knowledge of category theory. The 
notions relevant to the paper, but outside the scope of an introductory text book, 
are recalled in Section 2. Further information can be found in more advanced 
text books such as [28, 4, 8, 5]. Each section includes several examples, some 
are not self-contained, but they are not needed to understand the main results. 
A reader may skip the examples at first, to get more directly to the lifting 
theorems, and then use Fig 2 to select the examples of interest. 

Summary. Section 2 introduces monoidal categories (an internal language for 
monoidal categories) and notions, such as exponentials and monoids, definable 
in the setting of any monoidal category. Section 3 introduces a taxonomy of op- 
erations associated to a monoid, and gives the most general formulation of the 
lifting problem, namely what it means to lift an operation along a monoid mor- 
phism (Theorem 3.4 shows that lifting of algebraic operations is always possible). 
Section 4 introduces a taxonomy of monoid transformers and gives examples of 
strong monad transformers clarifying where they fit in the taxonomy. Section 5 
provides more lifting results for monoid transformers (Theorem 5.5 and 5.2). 
Section 6 concludes with some considerations on related and future work. 

Fig 1 says when the lifting theorems are applicable, while Fig 2 summarizes 
the examples given in the paper of operations op associated to monads and 
monad transformers T. To assess the usefulness of the lifting theorems, use 
Fig 1 to identify for which pairs (op,T) from Fig 2 “op lifts through T” . For 
instance, “callcc lifts through any T”, because callcc is algebraic (Fig 2). 




Taxonomy of operations op associated to a monad M 

op algebraic ==> op first-order (see Def 3.1) 


Operation op x : A(MX) > MX for M of arity A 

type 

MX = R r continuations (Example 3.8) 

abort \ : R > MX 

algebraic 

callcc* : (MX)( fiM |'fi| MX 

algebraic 

MX = X b environments (Example 3.9) 

read* : (MX) S MX 

local* : S s x MX MX 

algebraic 

first-order 

MX = (X x S) b side-effects (Example 3.10) ] 

read* : ( MX) b > MX 

algebraic 

write* : S x MX > MX 

algebraic 

MX = X x W complexity (Example 3.11) 

add* : MX x W 

algebraic 

collect x : MX — M ( X x W) 

none 

MX = X + E exceptions (Example 3.12) 

throw y : E > MX 

algebraic 

handle* : MX x {MX) E ) — > MX 

first-order 


Taxonomy of monad transformers T 

T monoidal ==> T functorial ==> T covariant ==> T basic (see Def 4.1) 


Transformer TMX 

type 

MX b environments (Example 4.5) 

monoidal 

M(X x 5) s side-effects (Example 4.6) 

monoidal 

M(X x W) complexity (Example 4.7) 

monoidal 

HX'.M(X + SX') S- steps 0 (Example 4.8) 

functorial 

HX'.M{ 1 + X x X') list (Example 4.9) 

covariant 

MB (mr ] continuations (Example 4.10) 

basic 


Monoidal categories £ with additional properties 


Monoidal category 

properties 

C with finite products (Example 2.14) 

symmetric 

profunctors (Example 2.16) 

none 

endofunctors (Example 2.16) 

strict 

strong endofunctors (Example 2.17) 

strict 

finitary endofunctors (Example 2.18) 

strict, exponentials 

expressible endofunctors in Fu> (Example 2.19) 

strict 

realizable endofunctors in pCA (Example 2.20) 

strict, exponentials 

realizable endofunctors in Fu (Example 2.21) 

strict, exponentials 


Figure 2: Overview of Examples 

“By a suitable choice of the endofunctor S the transformer T becomes TMX = M(X + E) 
exceptions, TMX = /j,X'.M(X + X') resumptions, and so on. 




2. Monoidal Categories 


It is well-known [28] that monads on a category C correspond to monoids 
in the (strict) monoidal category Endo(C) of endofunctors on C. A similar cor- 
respondence holds when monads are replaced by strong monads on a cartesian 
closed category C or by monads expressible in system Foj (or some other typed 
calculus of adequate expressivity), provided Endo(C) is replaced with a suitable 
(strict) monoidal category £. These observations suggest that a theory of monad 
transformers can be viewed as an instance of a theory of monoid transformers 
in the setting of a monoidal category £. There are two main advantages in 
moving to this more abstract setting: 

• simplicity: monoids (in a monoidal category £) are simpler than monads 
(on a category C): 

• generality: the theory has several instantiations, including different flavours 
of monads, by choosing a different monoidal category £. 

Readers already familiar with monoidal categories can browse through most of 
this section, and look only at some examples in Section 2.3. 

Definition 2.1 (Monoidal Category [28]). A monoidal category £ is a tu- 
ple (£, 0 , I, a, A, p), where 

• £ is a category, 0 : £ x £ • — r-> £ is a bifunctor, I £ £ is an object 

• ^ 0 , 6,0 : a®(b®c) — > (a 0 fe)®c , A a : I® a — > a , p a : a® I — > a are 
natural isomorphisms such that the diagrams ( 2 . 1 ) and ( 2 . 2 ) commute 

a® (b® (c 0 d)) ( a 0 6 ) 0 (c ® d) ((a ®b) ®c) ®d 

I 

id ® a 

l 

a ® ((b ® c) ® d) > (a 0 (6 0 c)) 0 d 

a 

a 0(1 0 6 ) -|'(a 0 l )06 

id 0 A p 0 id (2.2) 

i i 

a®b a 0 6 

When the natural isomorphisms a, A and p are identities, the diagrams neces- 
sarily commute, and the monoidal category is called strict. 

Definition 2.2 (Monoid). The category Mon(£) of monoids in a monoidal 
category £ is given by 


■ 5 ," ' ft. 

a 0 id (2.1) 
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objects are monoids M = ( M,e,m ), i.e. I — > M < 0 M in 

£ such that 



M®M 


arrows from Mi to M 2 are arrows Mf $ : ^'$$2 in £ such that 

| Mi® Mi 

l /!/ (2-5) 

I .,|u 

I > -M2 < M2 0 M2 

e 2 m2 

Identities and composition in Mon(£) are inherited from £. 

The forgetful functor U : Mon(£) ■■ wm £ maps a monoid M to M and an arrow 
Mi -U- M 2 to Mi — M 2 . 

Definition 2.3 (Exponential). An exponential of b to a in £ is an object b a 
together with an arrow ev : b a ® a — > j> satisfying the universal property 



x® a 


Definition 2.4 (Monoidal Functor). Given two monoidal categories £ and 
£' , a monoidal functor T from £ to £' is a tuple (T,<pi,<f)), where 




> T : £ — > £' is a functor 

> (f i : I' — > T I is an arrow, and (j> a> b : Ta ®' Tb — > jT(a® 6) is a natural 
transformation such that 


Ta ®' T(b 0 c) T(a ® (b 0 c)) 


Ta ®' (T& ®' Tc) 

I, 

a 

i 

(Ta ®' T6) ®' Tc - — (a 0 6) ®' Tc5| T((a 0 b) 0 c) 
00 id 0 


Ta) 


(2.7) 


K ® 7 Ta - 

I 

<j > i 0 id 


- Ta ® ; l ; 
id ®' (j)\ (2.8) 


Tl ®' Ta — s> T(l ® a) 
f 


T(a 0 I) < — Ta ®' Tl 
9 


When the arrows </>i and (j) at b are identities, the monoidal functor is called strict, 
and the commuting diagrams amount to say V = Tl, Ta®' Tb = T(a 0 b), 
a' = T(a), = T( A) and p' = T(p). 


Definition 2.5 (Monoidal Natural Transformation). Given the monoidal 
functors T and T' from £ to £' , a monoidal natural transformation r from T 
to T' is a natural transformation r : T — T' such that 


\' f Ta ®' Tb Ta ® T -> T'a ®' T'b 

\ (2-9) 

(pt*’ , 

Hil T(a ®$ •*- ^M0.(a®b) 

T l T a®b 

Theorem 2.6 (Extension). A monoidal functor T : £ *> £' induces a func- 

tor T : Mon(£) ■- — > Mon(f / ), and similarly a monoidal natural transformation 
t : T g y T' induces a natural transformation r : such that 

TM = I ' — > TM < — TM ®' TM (2.10) 

K T r T T T 

Mon(£) IT? Mo n(^fe^ — > £' = Mon(^¥"i £ J) r > £' (2.11) 




Proof. We prove that (M', e', m!) = TM is a monoid in S’, namely the analog 
of diagrams (2.3) and (2.4) in Definition 2.2 commute. 


(M' ®' M') ®' M' ■ 

t 


M' <g>' (M' O' M') (1) <p (2) 

id ®' <p 

• (j) > • Ta — > • — T(m®id)- 


Tid Tm (2) T(id ® to) (3) 

M ® .\f& • • M' 


1. by diagram (2.7) in Definition 2.4 

2. by naturality of (j) 

3. by functoriality of T and diagram (2.3) in Definition 2.2. 


(2) 


A' (1) T(e® id)«§g>- (4) ft 


T A (3) Tm 


\ 


M' M' : 


= M' - : ■ - M' 


1. by diagram (2.8) in Definition 2.4 

2. by naturality of (j) 

3. by functoriality of T and diagram (2.4) in Definition 2.2 

4. same justifications as above, but with A replaced by p. 



We prove that Tf : TM\ > TM 2 in Mon(£'), namely the analog of dia- 

gram (2.5) in Definition 2.2 commutes, when / : Mry^> M 2 in Mon(£). 


0| Tex, 

(1) 

~1>\ > Te-2 


TM 1 

tm 2 


Tmi (j> 


(1) T(/®/) (2) 

1 . 

< Tm 2 < 0~~ 


TM 1 ®' TM 1 

I 

Tf ® Tf 

l 

TM 2 Cl) 1 T M 2 


1. by functoriality of T and diagram (2.5) in Definition 2.2 

2. by naturality of (p 

We prove that tm '■ TM > T'M in Mon(f '), namely the analog of dia- 

gram (2.5) in Definition 2.2 commutes, for any monoid M in Mon(f). 


— TM O' TM 

(!) T i ( 2 ) t m (2) t m ®m (1) t m ® r M 

ill 1 


1. by diagram (2.9) in Definition 2.5 

2. by naturality of r 


□ 


2.1. Languages for Monoidal Categories 

It is well-known (see [40, 22, 23]) that the simply typed A-calculus can be 
interpreted in any cartesian closed category C: types r and type assignments 
T are interpreted by objects, and well-formed terms T h t : r by arrows (from 
the interpretation of T to the interpretation of r). Conversely by extending 
the simply typed A-calculus with types and operations representing objects and 
arrows of C, one can express diagrams in C as (sets of) well-formed equations 
r h ti = t 2 : r, and by devising a suitable notion of theory, one can establish 
an equivalence between a category of theories and a category of models. 

In this section we introduce typed calculi for monoidal categories (with expo- 
nentials). Our aims are pragmatic, i.e. to use these calculi to express definitions, 
statements and proofs involving monoidal categories. In fact, expressing dia- 
grams with equations may sometimes improve readability and simplify proofs. 

Fig 3 and Fig 4 define the language for monoidal categories with exponen- 
tials. The language is inspired by the natural deduction system for intuitionistic 
non-commutative linear logic described in [38]. 
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Variables if X 

Terms t € E ::= x | op(t) | (ii , t 2 ) | let (aq, x 2 ) = t\ in t 2 \ 

* | let* = ti in t 2 | Aa :.t \ 1 1 

Base Types af B 

Types t e T ::= a | ti <g) r 2 | I | rj 1 

Assignments T € (X x T)* such that each if X occurs at most once in T 

We write x : r for the assignment consisting of the pair (x, r), and ri,r 2 for the 
concatenation of two assignments. The concatenation Id , r 2 of two assignments 
fails to be an assignment, when a variable x occurs in both Id and T 2 . 

A term t is identified with its equivalence class modulo a-conversion. We use the 
derived notation letp = T in f 2 , where p ::= x \ * | (pi,p 2 ) is a linear pattern. 

Figure 3: Syntax 


IYMi : n 
r 2 h t 2 : t 2 

ri,r 2 h (ti,t 2 ) : Ti 0r 2 


I.I - 


I.E 


b * : I 
: Ti b t : r 2 


T b t : Ti 

ma P “FT 7T °P : n - r 2 

T b op(t) : r 2 

T 2 b ti : n (g) t 2 

^ E Ti.Xi : ri,x 2 : r 2 ,r 3 b f 2 : 
<gl ' ri,r 2 ,r 3 b let(a;i,a; 2 ) = ti in 
r 2 b ti : I Ti,r 3 bt 2 :r 
r l5 r 2 , r 3 b let * = ti in t 2 : r 

E Ti b fi : tJ 1 r 2 b t 2 '■ r 2 
r!,r 2 b ti t 2 : t 2 


The type system is for deriving typings of the form T b t : r, with T an 
assignment. Therefore, each typing rule has an implicit side-condition requiring 
that the concatenation of assignments in the conclusion must be an assignment. 

Figure 4: Type System 


let(a:i,x 2 ) = (fi,t 2 ) inf 
let* = * inf 


t[xi : ti,x 2 : t 2 ] 
t 


(Xx : n.t 2 ) ti 


t 2 [x : ti] 


t'[ x : t] denotes substitution of x with t in t/ modulo ct-conversion, namely 
bound variables in i! are renamed to avoid clashes with the free variables in t. 
We denote with => the compatible closure of the reduction rules given above. 


Figure 5: Reduction 
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We say that a typing T b t : r is well-formed, when it is derivable from the 
rules in Fig 4, and an equation T b t\ = t 2 : r is well-formed , when the typings 
T b t\ : t and r h i 2 : r are well-formed. An interpretation [— ] of the language 
in a monoidal category £ (with additional structure) is defined by induction 

• [r] is an object of £ defined by induction on the structure of the type r; 

• [r] is an object of £ defined by induction on the length of the assignment 
T: the empty assignment is interpreted by I, and [r,x : r] = [r] 0 [r]; 

• [r b t : t] is an arrow of £ from JT] to [r] defined by induction on the 
unique derivation of the well-formed typing T b t : r, e.g. 

if [Vi b U : nj = fi : Jr*] > [rj], then [Fi,r 2 b {t\,t 2 ) : n 0 t 2 ] is 

[r 1 ,r 2 ] % [r,] 0 [r 2 ] | Tl j # [ r2 ] 

where JFi , r 2 ] [ri] 0 [r 2 ] is the unique isomorphism given by the 

coherence result for monoidal categories (see [28]). 

If T h ti = t 2 : t is a well-formed equation and [— ]/ is an interpretation of 
the language, as outlined above, then we write F u / tj = f 2 : r, when the 
interpretations [r h U : r]/ denote the same morphism. 

Definition 2.7 (Monoid). We express as well- formed equations Definition 2.2 
of monoid M = (M, e, m) and monoid morphism f : M\ — > M 2 

• The diagrams (2.3) and (2.4) are equivalent to the equations 

x : M x ■ e = x : M (2.12) 

x : M \- e - x = x : M (2.13) 

Xi,x 2 ,X 3 : M \- (xi ■ x 2 ) ■ X 3 = %t ■ ( x 2 ■ X 3 ) : M (2.14) 

where M is a base type, op e : I — > M and op m : M 0 M —> M are 

operations, and we write e for op e (*) and t\ ■ t 2 for op m (t\,t 2 ). 

• The diagram (2.5) is equivalent to the equations 

h f ei =e 2 :M 2 (2.15) 

X!,X 2 : Ml h f(x ! -1 x 2 ) = (/ Xi) - 2 (/ x 2 ) : M 2 (2.16) 

where Mi, e* and t\ •* t 2 are as above, and f : M\ — > M 2 is an operation. 

The reduction rules of Fig 5 induce a reduction t\ => t 2 (on terms modulo 
a-conversion) with the following properties: 

• subject reduction, i.e. T b ti : r and t\ => t 2 imply T b t 2 : r 

• confluence, i.e. ti =>* t 2 and t-\ =>* imply t 2 =>* t± and t;i =>* ti 
for some 1 4 
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• strong normalization, i.e. T h t : r implies exists n such that m < n 
whenever t ==$. m t' 

• soundness, i.e. T b t\ : t and t\ => t 2 imply T l-j t\ = t 2 : r for any I 3 * . 

We write Eq 0 for the set of well- formed r h (, = t 2 : r such that t\ => t 2 . 
Given a set Eq of well-formed equations, we write T \~E q fi = t 2 : r, when the 
well-formed equation T h ti = t 2 : r is in the congruence induced by Eq U .Ego- 

Notation 2.8. To prove T \~Eq t = if : r we give a stack of rewriting steps 
Cfti] by justification 

— (from t down to t ), where C[— \ is a context with 

E[t 2 \ 

one hole and justification explains why ti = t 2 (more precisely T' b t- t = t 2 : r', 
with T' and r' inferable from T, r and C'[— ]j. A justification could be 

• reduction, when t\ =>* to and t 2 =>* to for some term to, or 

• r 7 I— eq: t' in Eq, when t\ = t 2 is a substitution instance of eq. 

We suppress the underlining/overlining when the context is the hole. Proofs in 
this style can be found in Example 2.11. □ 

2.2. Examples of Monoids 

We give constructions of objects in Mon(f), which may require additional 
assumptions on the monoidal category £. More examples of monoids, in the 
form of strong monads, are given in Section 3.1. 

Example 2.9. The initial monoid I, is given by I ' d jfe jfc < A I and is an 
initial object in Mon(<£). □ 

Example 2.10. When £ has J-limits, i.e. limits for diagrams of shape J, then 
Mon(£) has J-limits which are computed pointwise, therefore they are preserved 
by the forgetful functor U. In particular, if £ has a terminal object 1, then the 
unique monoid structure 1 on 1 yields a terminal object in Mon(£). □ 

Example 2.11. When the exponential o“ exists, the monoid Ka of endo- 

morphisms on a is given by I S — C ° •• ® o° where 

i a : o° = Ax : a.x (2.17) 

c a(9, f :a a ):a° = Xx : a.g (/ x) (2.18) 

Moreover, if M = ( M,e,m ) is a monoid, then one has a monoid morphism 
to m ■ M KM given by 

to*(x : M) : M m = Xx' : M.x ■ x (2.19) 

3 The reduction is incomplete, since there is a well-formed T h : T th a t holds in any 

interpretation (e.g. x : I I- (let* = ®in*) = x : I), but ti and t 2 have different normal forms. 
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We show that K a is a monoid, i.e. it satisfies the equations (2.12), (2.13) and 
(2.14), Let Eq be the set containing only (rj. — >), i.e. the sound equation 
x' : a a b (A x : a.x' x) = x' : a a (we drop the type a of bound variables) 

Ca(*,i«) 

Xx.x' ((Xx.x) x) 

Xx.x' x 
x' 

• x' : a a \~E q c a ( ia • x') = x' : a a the proof is similar to the one above. 

• X\,X2,XZ ■ a a b Eq c a {c a (x 1 ,X2),x 3 ) = c a {x 1 ,c a (x 2 , x 3 )) : a a 

Ca(Ca(xi,X2),X3) by definition 

Xx.(Xx.xi (x 2 x)) (x3 x) by reduction (/?. — >) 

Xx.xi (( Xx.x 2 (x 3 x)) x) by definition 

Ca(xi,C a (X2,X 3 )) 


by definition 
by reduction (j3. — >) 
by (r/. -4) in Eq 


We show that to^ is a monoid map, i.e. it satisfies the equations (2.15) and 
(2.16), when M is a monoid. Let Eq be the set of equations saying that M is a 
monoid (we drop the type M of bound variables) 

• b Eg tOjq(e) = \ M : M M 

t0 *( e ) 

Xx . e ■ x : 

Xx.x 

I M 

• X!,X 2 : M \- Eq tOj^(x\ ■ x 2 ) = CM(to J ^(x 1 ),tOj^(x 2 )) : M M 

tOy f (a,'i • x 2 ) by definition 

Xx 3 . (xi ■ x 2 ) ■ x 3 by (2.14) in Eq 

XX3.X1 ■ (x 2 ■ X3) by reduction (/3. — >) 

Aa; 3 .(Aa;.a:i • x) (( Xx.x 2 ■ x) X 3 ) by definition 

c m( to J& (a:i),to J& (* 2 )) 


by definition 
by (2.13) in Eq 
by definition 


□ 

Example 2.12. When the left-adjoint (— )* to U : Mon(£) exists, it 

gives free monoids. There are several assumptions on £, which imply the 
existence of free monoids. For instance (see [19, Page 68-69]): 

1. if £ has exponentials, £ has binary coproducts, and for each a e £ the 
initial algebra for the endofunctor I + a (S> — exists, then a* exists and its 
carrier is given the carrier fix. I +801 of the initial algebra; 
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2 . if £ has binary coproducts, for each agf the endofunctor — ® a preserves 
colimits, and for each agf the chain ap defined by ordinal induction 

ao = I <Z/3+i = I + a <g> <2/3 a a = col™ a /3 (A limit ordinal) 
converges at some /?, i.e. ap = <2/3+1, then a* exists and its carrier is ap. 


Example 2.13. Given a monoid M = (M, e, m) in £, and a monic M' c — > M 
in £, such that for some (unique) maps e' and m! 


I M®M 



M' < 7 M' ® M' 


then M' = (AT, e' . in') is a monoid, called the sub-monoid of M induced by 
the monic i, and M' c — > M is a monoid monomorphism. The general definition 
of quotient of a monoid M is more involved. We give only concrete descriptions 
of sub-monads and quotient monads in Set, i.e. sub-monoids and quotient 
monoids in Endo(Set) of Example 2.16. Given a monad M = (M, 77, — *) on Set 
presented as a Kleisli triple (see [29, 32]): 

• A sub- monad of M is uniquely identified by 

a family of subsets (Sx C MX \ X ) such that VX.\/x e X.r]x{x) S Sx 
and VX, Y. V/ : X — > Sy.V x $ S x .g* x g S Y 

where g = X — Sy c — > MY. 

• A quotient monad of M is uniquely identified by 

a family of equivalence relations ( R x C MX x MX \ X) such that 
VX, y.V/ : X — Sjj Ry X(xi, X2) e R x .(giXi,g%X2) € Ry where gt = 
X — R y ■ *‘> MY. 

The class of sub-monads of M (and similarly for quotient monads) has an obvi- 
ous partial order (given by pointwise inclusion) which is closed w.r.t. arbitrary 
meets (computed by pointwise intersection), namely ( S) x = Q S x - 

ses ses 

Therefore, any family S = (S x Q MX \ X) of subsets generates the smallest 
sub-monad containing S, and any family R = (R x C MX x MX \ X) of 
relations generates the smallest quotient monad containing R. □ 
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2.3. Examples of Monoidal Categories 

We give several examples of monoidal categories, and when possible we say 
whether they have exponentials. The definition of monoidal category is self- 
dual, i.e. there is a bijection between monoidal structures on £ and on £ op . 
Therefore, each example has a dual. 

• A category with finite products (Example 2.14), like Set, is the most 
obvious example of monoidal category. 

• Example 2.15 defines several full sub-categories of a monoidal category. 

• For monads, the category Endo(C) of endofunctors (Example 2.16) is 
paradigmatic, and the other examples we give are variations on this. 

• For strong monads, the appropriate variation on Endo(C) is the category 
of strong endofunctors (Example 2.17), 

• For algebraic theories [29] (and collection types [30]), an appropriate choice 
is the category of finitary endofunctors (Example 2.18), 

• The category of endofunctors expressible in Flo (Example 2.19) establishes 
a formal link with [17], and is paradigmatic of syntactic examples based 
on typed calculi, but it does not have exponentials. 

• Realizability [26, 34] is a general technique to build models for rich type 
structures on top of computationally expressive (untyped) applicative struc- 
tures, Examples 2.20 and 2.21 define realizable endofunctors on a category 
of partial equivalence relations on a partial combinatory algebra and a 
second-order combinatory algebra, respectively. 

Example 2.14. A category C with finite products (e.g. the category Set of 
sets) forms a symmetric monoidal category ( C , x, 1, a, A, p), where x is a binary 
product functor, 1 is a terminal, and the natural isomorphisms are uniquely 
determined by the universal properties of products. In this monoidal category 
exponentials (in the sense of Definition 2.3) correspond to the usual notion of 
exponentials for a cartesian closed category. □ 

Example 2.15. Given a monoidal category £ with J-colimits (similar results 
hold for J-limits), we write Colimj(£) for the full sub-category of £ whose 
objects a £ £ preserve J-colimits, i.e. the functor a®—:£ — > £ preserves 
J-colimits. This sub-category inherits the monoidal structure from £. 

If C is a category with J-colimits and £ is the (strict) monoidal category of 
endofunctors over C (see Example 2.16), then £ has J-colimits and Colim j(£) 
is the category of endofunctors on C preserving J-colimits in C. Moreover, a 
simple way to meet the convergence requirement in Example 2.12 is to work in 
Colim aJ (5), where all chains ap converge at u>. □ 
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Example 2.16. If C is a category, then the category Endo(C) of endofunctors 
over C forms a strict monoidal category (Endo(C), o, Id), more precisely 
objects are endofunctors F : C - — > t’ 

arrows from F to G are natural transformations r : F 'i^> G 
tensor G o F is functor composition (G o F)(— ) = G(F(—)) 
unit Id is the identity functor ld(— ) = — . 

In Endo(C) an exponential G F is a right Kan extension of G along F, charac- 
terized by a bijection from H -si§pj- G F to H o natural in H. 

If C has J-colimits, i.e. colimits for diagrams of shape J, then so does 
Endo(C), these J-colimits in Endo(C) are computed pointwise and are preserved 
by the functors — o F : Endo(Cji fes > Endo(C) (similar results hold for limits). 

Also the category of profunctors C op xC — > Set forms a monoidal cate- 
gory (see [8]), and there is a monoidal functor from endofunctors to profunctors 
mapping F to C(— i,F— 2). □ 


Example 2.17. If C is a monoidal category, then the category Endo(C) s of 
strong endofunctors over C forms a strict monoidal category, more precisely 
objects are F = (F, t F ) with F : C — > C functor, t F b : a®Fb — > F(a (g) b ) 
natural transformation such that 

id (5£) 

I < 8 » Fa — > F( I 0 a) a 0 (b 0 Fc) — - — ^ a 0 F(b 0 c) — > F(a 0 (b 0 c)) 




f 

F((a 0 b) 0 c) 


arrows from F to G are natural transformations r : F — G such that 
id 0 t 

a®Fb?F %$®Gb 


w t c 

l T i 

F(a 0 b) > G(a 0 b) 

tensor G o F is the pair ( G o F, t) with 

t a ,b = a® G(Fb) G(a 0 Fb) G(F(a 0 b)) 

unit Id is the pair (ld,f) with t a ^ = id a 0 t. 

Moreover, the forgetful functor U : Endo(C) s > Endo(C), mapping F to F, 

is strict monoidal. Also the category Endo(C) m of monoidal endofunctors 
forms a strict monoidal category. □ 
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Example 2.18. We define the category Endo(Set) / of finitary endofunctors 
on Set. This category inherits the monoidal structure of Endo(Set), but unlike 
Endo(Set) it has exponentials. These results generalize when Set is replaced by 
a locally finitely presentable enriched category (see [20]). A finitary endofunctor 
F on Set is determined by its action on finite sets (e.g. see [5]), we give two 
equivalent characterizations 

• F preserves filtered colimits; 

• for any x £ FX, exists n finite, i : n — > X and x' £ Fn s.t. ( Fi)x ' = x. 

We write Endo(Set) / for the full sub-category of Endo(Set) whose objects are 
finitary endofunctors. 

The first characterization implies that Id is finitary, composition of finitary 
endofunctors is finitary, and the colimit in Endo(S'ei) of a diagram in Endo(Set) / 
is in Endo(Set)/. Therefore, Endo(Set)/ inherits from Endo(Set) the monoidal 
structure and colimits, and the inclusion of Endo(Set)/ into Endo(Set) is a 
strict monoidal functor, which creates and preserves colimits. 

The second characterization implies that Endo(Set)/ is equivalent to the 
category of functors Set Set/ , where Set / is the full small sub-category of Set 
whose objects are finite cardinals (aka natural numbers). In one direction the 
equivalence is given by restricting an endofunctor F to Set / (we denote this 
restriction with Ff), in the other direction it is given by the left Kan extension 
along the inclusion J : Set / c — > Set 

Lan jF f = J - n x (F f n) 

i.e. the coend (see [28, Ch 9 and 10]) of S : Set^ p x Set/ — > Endo(Set) where 
S(m,n) = — m x (Ffn). In fact, S factors through Endo(Set)/, as — m x A is 
finitary when m £ Set / and A £ Set, thus the coend (which is a colimit) is 
in Endo(Set)/, too. The monoidal structure on Endo(Set)/ induces on Set Set/ 
the following tensor (with unit given by the inclusion functor J) 

(H <g >F)a = J (Fa) n x (. Hn ) 

i.e. the coend with parameter for S : Set / x Set^ p x Set / > Set where 

S(a,m,n) = ( Fa) m x (Hn). The exponential G F in Set Sct/ is given by 

(G F )a= J(Gn)^ a 


i.e. the end with parameter for T : Set / x Set^ p x Set / > Set where 

T(a,m,n) = (Gn) (Frr ^". To prove that G F is an exponential requires general 
properties of ends and coends, which can be found in [28, Ch 9]. □ 
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Example 2.19. Consider system Fui with /^-equivalence (see [3, 12]). We 
define the strict monoidal category £p u of endofunctors and natural transfor- 
mations expressible in Fuj (the construction make sense also for other typed 
calculi). Most results in [17] can be recast as category-theoretic properties of 
£fu- For convenience, we recall the syntax of Fu> 

kinds k ::= * | k — > k 

type constructors U X \ U —y U \ VX :k.U \ XX :k.U \ UU 

terms e ::= x \ Xx : U. e \ e e \ AX \k.e\eU 

and introduce some notational conventions: we write e B for e U (polymorphic 
instantiation) and we write definitions fx(x : A) = t for / = AX : A x:A.t. 

objects are expressible endofunctors, i.e. pairs F = (F, map F ) with F : * —> * 
closed type constructor and map F : VX, F : *.(X — > Y) — » FX —y FY 
closed term such that the following /^-equivalences hold 

map F A (id*) = id fx :FX^FX 
ma P x,z id 0 /) = (map F z 9) 0 ( ma P x,y /) • -FX y FZ 

where, idx = Ax : X. x is the identity on X and g o f = Xx : X. g (f x) is 
the composition of g : Y — > Z and f : X —> Y 

arrows from F to G are expressible natural transformations, i.e. /^-equivalence 
classes [r] of closed terms r : VX: *.FX —y GX such that the following 
/^^-equivalence holds 

(map % Y f)o TA = T B o (map F y /) : FX—yGY 

Identity on F is the /3r/-equivalence class of lf = AX : Xx: FX.x, and 

composition of [a] and [r] is [a] o [r] = [AX :*.a x 0 Tx]- 

tensor GoF is (GoF, map) with map A - Y (/ : X — > Y) = map^ x FY (map A Y /). 
unit is the pair (Id, map) with Id = AX : *. X and map A B (/ : A— y B) = f. 

£fui does not have exponentials, even in the weak sense. More specifically, 
when G is the identity functor and F is the constant functor FX = A (for some 
closed type A), there are no natural transformations from H oF to G, no matter 
what is H. In fact, given r : 'iX.H(FX') —y GX, naturality of [r] means that 
X, Y :* f : X —>Y, u : HA h f(r x u) = t y u : Y is a ^-equivalence. However, 
this is impossible, because the normal form of the lhs contains / free, while the 
normal form of the rhs does not. 

Due to the lack of weak exponentials, also some claims in [17] are false. 
For instance, let M and K be the expressible functors such that MX = X 
and KX = VZ: *. (X -► Z) -► Z, then from : VX: *.KX MX given by 
from A (c : KX) = c x { idx) is not a natural transformation from K to M (as 
claimed in [17, Proposition 14]). In fact, naturality of from amount to say that 
c : KX f : X —yY b f(cx idx) = cy / : F is a /^-equivalence, but this is 
impossible, because the two terms are different /3r/-nornial forms. □ 
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Example 2.20. Let ( A , •) be a partial combinatory algebra ( see e.g. [26]), i.e. 

a set A with a partial operation • : A x A * A, we write a b for -(a, b ), and 

two elements K ^ S such that K xy = x, Sxy i, S xyz~xz(yz). The 
category V A of partial equivalence relations over A is given by 

objects are symmetric and transitive relations RC Ax A (called PERs); A/R 
denotes the set of Inequivalence classes, i.e. the set of subsets X C A 
such that 3x £ X A (Va £ A.a £ X aRx ); 

arrows from Ri to R% are maps / : A/Rx — A / R 2 with a realizer, i.e. an 
r £ A such that MX £ A/R { .Mx £X.rx£ f(X) (r \~ A f for short). 

The category Endo{V A )r of realizable endofunctors and realizable natural 
transformations is the sub-category of Endo^^) such that 

objects are endofunctors F : V A V A with a realizer, i.e. an r £ A such 
that a\~ A f implies r a \~ A F(f) for every a £ A and arrow / in V A . 

arrows from F to G are natural transformations r : F *> G with a realizer, 
i.e. an r £ A such that r \~ A tr for every object R of V A . 

Endo{V A ) r inherits the (strict) monoidal structure of EndofT^), because realiz- 
able endofunctors and realizable natural transformations are closed w.r.t. iden- 
tities and composition. Therefore the inclusion of Endo('P^) r into EndofTTi) is 
a strict monoidal functor. Endo('P/\) r , unlike Endo('P^), has exponentials. We 
give a concrete description of an exponential ev : H ® /• >,- > (7 for a pair 
realizable of functors F and G: 

• aH (R) b a and b are realizers for the same realizable natural trans- 
formation r : Yr (g> F ely G. where Yr is the realizable endofunctor — R 
given by exponentiation to R in V A 

• an arrow R — — >s S in V A induces a realizable natural transformation 
Y(f) : Yr —■ ^ Y r such that Y(f) T = T* . Therefore, when Y R ®F — ‘^fG 

is realizable, also Yr ® F — ^ ® Yr 0 F > G is. This induces 

a function H(f) : A/H(R) > AJH(S). and by elementary considera- 

tions one can give an a £ A such that ar\~ A H(f ) whenever r\~ A f 

ev : H<S>F G is given by eu/{([a]) = TR(\dFR), where r : Y F r®F — G is 
the natural transformation realized by a, thus ev is realized by the interpretation 
of the combinatory term [x\x([y\y). □ 

Example 2.21. We define the strict monoidal category Endo('PFw)r of endo- 
functors and natural transformations realizable in Fu. The definition is like that 
of Endo(7 3 / \) r in Example 2.20, but the partial combinatory algebra (A, •) is re- 
placed by Fui (more generally, one could use a partial second-order combinatory 
algebra [9]). Endo(TV^). r , like EndofTTi),., has exponentials. 

In the sequel we confuse /^-equivalences class with their elements, when it 
is safe to do so, and use the following auxiliary notation: 
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• T is the set of /^-equivalence classes of closed types A; 

• E(A) is the set of /^-equivalence classes of closed terms e of type A £ T: 

• P(A) is the set of PERs on E(A): given R £ P(A) we denote with E(R) 

the set of ^-equivalence classes, i.e. the set of subsets X C E{A) such 
that 3e e X A (Ve' € E(A).e' e'Re). 

The category Vfu is given by 

objects are pairs ( A , R) with A £T and R £ P(A)-, 

arrows from (.4i,i?i) to (A 2 , R 2 ) are / : E(R\) > E{R, 2 ) with a realizer 

r h /, i.e. r £ E(A 1 -» A 2 ) such that VX e E(M,).Ve £X.re£ /(X). 

The category Endo(7V w ) r of endofunctors and natural transformations realiz- 
able in Fui is the sub-category of Endo(7V w ) such that 

objects are endofunctors F : Vfu •-• ?•> Vi x with a realizer F h F, i.e. 
F is a pair [F, map F ) with F : * — > * closed type constructor (uniquely 
determined by F modulo /^-equivalence) such that F(A, R) = (B, S) 
implies B = FA and map F e E(VX,Y:*. (X Y) FX FY ) such 
that / : (A, R) — > ( B , S) in Vfu and eh/ implies map F B e h F(f): 

arrows from F to G are natural transformations r : F — G with a realizer 
r b r, i.e. r £ E(\/X : *. FX — > GX ) such that ta h Ra,r) for any (A, R). 

Endo(P Fw ) r inherits the (strict) monoidal structure of Endo/Pp^.), and the in- 
clusion functor is strict monoidal. We show (by analogy with Example 2.20) 
that Endo(P Fw ) r has an exponential ev : H 0 F > G for any F and G: 

• H(A,R) = (VZ : *.{A -> FZ) GZ,S) with aSb ^ a and b are 
realizers for the same natural transformation r : Y (a , r) 0 FmmG, 
where Y^ A Rj is the realizable endofunctor — (A R) gi ve n by exponentiation 
to (A,R) in Vfu 

• as realizer for H we take (H, map H ) with HX = \/Z: *.(A^FZ)->GZ 
and map % >Y (f : X -► Y,c : HX) = A Z : *.A k : Y -► FZ.c z (k o /). In 
particular, map H determines the action of H of arrows in P Fw 

ev : H 0 F — — ^ G is the natural transformation realized by the element r in 
E(VX.H(FX)^GX) given by r x {c : H(FX)) = c x (id Px ). □ 


3. Operations and Lifting 

Given a monoidal category £, we introduce several classes of operations as- 
sociated to a monoid in £. and define what it means to lift such operations along 
a monoid morphism. In this section, we prove that lifting exists and is unique, 
when restricting to algebraic operations. In the following section, we establish 
lifting results for wider classes of operations. 
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Definition 3.1 (Operations). Given a monoid M = (M, e,m) and a functor 
H : Mon(£) -“8fs £, an if -operation for M is a map op : HM'ff^ > M in £. 

A first-order operation of arity A € £ for M is a map op : A ® M — > M, 
i.e. an H -operation for H (— ) = A<g>U(—), and such op is called algebraic when 

s : A, x\, X2 : M h op(s,#i) • = op(s,a;i • xf) : M (3.1) 

Definition 3.2 (Lifting). Given an H -operation op : HM\ > Mi for Mi 

and a monoid map h : Mi M2, an H -operation op : H M2 M2 for 

M2 is a lifting of op along h when 

HM 2 ° p > m 2 

Hh Uh (3.2) 

HMi Mi 

op 

Remark 3 . 3 . Equation (3.1) is equivalent to 

s : A, x : M b op(s, x) = op(s, e) • x : M (3.3) 

From this it is immediate to establish a bijective correspondence between alge- 
braic operations op : A 0 M > M for M and maps op' : A f — > M 

op '(s:A):M = op(s, e) 
op(s : A,x : M) : M = op'(s) • a; 

Diagram (3.2) is equivalent to the equation 

s : A,x : Mi\- h(op(s, x)) = op(s, h(x)) : M 2 (3.4) 

when E(-) = A®U(~). □ 

Theorem 3.4 (Unique algebraic lifting). Given h : M% > M2 monoid 

map and op : A ® Mi ^ Mi algebraic for Mi, let op 1 * : A ® M2 ^ > M 2 be 

op**(s : A, x : M 2 ) : M 2 = h(op(s, ei )) - 2 x (3.5) 

then op 11 is the unique lifting of op along h which is algebraic for M2 ■ 

Proof. By definition op 11 is algebraic for M 2 - Let Eq be the set of equations 

saying that h : Mi > M 2 and op : A ® Mi — > Mi is algebraic for Mi. Let 

Eqop be Eq plus the equations saying that op : A ® M 2 M 2 is algebraic 
for M2 and is a lifting of op along h. The claims that op 11 is a lifting of op along 
h and uniqueness amount to the following equations 
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• s : A,x : Mi \- Eq op$(s,h(x)) = h(op(s,x)) : M 2 
op *(s,h(x)) 

h(op(s, ei)) - 2 h(x) 
h(op(s, ei) -i x) 
h(op(s,x)) 

• s: A, x : M 2 \- Eqop op{s,x) = op # (s,a;) : M 2 
op(s,a;) 

op(s,e 2 ) * 2 x 
opQ,/i(ei)) - 2 x 
h(op(s, ei)) - 2 a; 
op # (s,x) 


by definition 
by (2.16) in Eg 
by (3.3) in Eg 


by (3.3) in Egop 
by (2.15) in Egop 
by (3.4) in Egop 
by definition 


□ 

Remark 3.5. An algebraic operation may have several liftings along a monoid 
map. For instance, take Set with the monoidal structure given by finite products 
(see Example 2.14), a monoid M = (M, e, •) and an op : M M0 M algebraic for 
M, i.e. op(a;) = op' ■ x where op' = op(e). Define the monoids 2 = ({0, 1}, 1, *) 

and N = M x 2, and consider the monoid map h : M N given by 

h{x) = (x, 1). The unique algebraic lifting of op along h is opH/x, b) = (op' ■ x. 6), 
a different lifting of op along h is given by op (a:, b) = (op' ■ x, 1). □ 

3.1. Examples of Operations 

Among the different flavours of monads, strong monads are those needed to 
interpret the monadic metalanguage of [31, 32]. In this section we give examples 
of strong monads (on a cartesian closed category) and associated operations, 
saying whether the operations are algebraic, first-order or //-operations. There 
are equivalent ways of defining strong monads on a cartesian closed category 
C, we borrow the definition adopted in Haskell, and freely use simply typed 
lambda-calculus as internal language to denote objects and maps in C. 

Definition 3.6 (Strong Monad). A strong monad on a cartesian closed cat- 
egory C is a triple M = ( M , ret M , bind M ) consisting of 

• a map M : |C| — > |C| on the objects of C 

• a family ret^ : X — > MX of maps with X e C 

• a family b\nd^ Y : MX x (MY)$M—>. MY of maps with X,Y&C 
such that for every a : A, f : ( MB) A , u : MA and g : ( MC) B 

bind^ B (ret^(a),/) = fa 
bind a,a{ u i ret A ) = u 

bind^ c (u, A a : A. bind BC (/ a, g)) = bind^ c (bind^ B (u, /), g) 
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A strong monad morphism r : M > N is a family Tx ■ MX 3> NX of 

maps with X e C such that for every a : A, u : MA and f : ( MB) A 

t a (ret^f (a)) = retf(a) 

t b (bind^ B (u, /)) = bind^ B (T A u, Xa : A.t b (fa)) 

Remark 3.7. In the monoidal category Endo(C) s of strong endofunctors on 
a cartesian closed category C what is usually meant by an algebraic operation 
for a strong monad M (e.g. see [35]) is an algebraic operation (in the sense of 
Definition 3.1) of arity A(X) = JxX 1 (with /, J £ C) for M. For these algebraic 
operations there is another bijective correspondence, in addition to the one given 
in Remark 3.3, namely between algebraic operations op x : J x (MX) 1 — > MX 
for M and maps op" : J — > MI in C 

op "(j :J): MI = op 7 (j, retf ) 
op x (j:J,f:(MXY):MX = bindf x (op "(j), /) 

This correspondence does not hold when Endo(C)., is replaced by Endo(C), and 
does not give improved lifting results over Theorem 3.4. □ 

Example 3.8. The monad M = (M, ret M , bind M ) of continuations in R is 

MX = R ^ 
retx(x:X) = \k:R x .kx 

bind^ y (m : MX, f : MY X ) = Xk : R Y .m(Xx : X. f xk) 

It has two algebraic operations, one for the functor A a t, ort X = R and the other 
for the functor A ca n cc X = X (R \ namely 

aborts (r : R) = Xk : R x . r 

callcc x (f ■ (MX)( rMX '>) = Xk : R x . f (Xt : MX.tk) k 

Usually, the associated operation is callcc Y Y ■ (MX) ((MY>A 1 — > MX, which 
is definable from callcc, abort, unit and bind of the monad (see [17]). □ 

Example 3.9. The monad M = (M, ret M , bind M ) of environments in S is 
MX = X s 
ret^ (x : X) = Xs : S.x 
bind % Y (m: MX, f : MY X ) = X s:S.f(ms)s 

It has an algebraic operation for the functor d. reac \X = X s and a first-order 
operation (but not algebraic) for the functor A\ OC3 \X = S s x X, namely 

read* (/ : (MX) S ) = A s:S.fss 
local x (f :S s ,t: MX) = Xs : S.t(fs) 



24 


Example 3.10. The monad M = (M. ret M , bind M ) of side-effects on S is 

MX = (XxS) s 
ret* (x : X) = A s : S. ( x , s ) 

bind x,Y( m '■ MX, f : MY X ) = As : S. let (a, s') = m s in f a s' 

It has two algebraic operations, one for the functor A reati X = X s and the other 
for the functor A wr ; te X = S x X, namely 

read* {k : (MX) S ) = A s:S.kss 
writer (s : S,m : MX) = As' : S. ms 

□ 

Example 3.11. The monad M = (M, ret M , bind M ) of complexity on a monoid 
(W, 0, +) in C is 

MX = X x W 
retx (x '■ X) = (x, 0) 

bind x,y(( x i w ) '■ MX, f : MY X ) = let (y, w') = fx in (y, w + w') 

It has an algebraic operation for the functor A add X = X x W and //-operations 
for the functors H co \\ ectA MX = MA x X^ AxW \ namely 

addx (t : MX, w : W) = let (*, w') = t in {x, w' + w) 
collects, x(t : MA, f : X^ AxW ^) = let(y,«7) = tin (ft,w) 

Usually the associated operation is collect^ : MX > M ( X x W) , which is 

definable from the operations collect^, unit and bind of the monad. □ 

Example 3.12. When C has binary sums, the monad M = (M, ret M , bind M ) 
of exceptions in E is 

MX = X+E 
retx {x : X) = ini a: 
bind^ >y (m : MX, f : MY X ) = [f, inr] to 

It has an algebraic operation for the functor d throw X = E and a first-order 
operation (but not algebraic) for the functor A hand \ e X = X x X E , namely 

throwx (e : E) = inre 

handle* (m : MX, h : (MX) E ) = [ini, h](m) 
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Example 3.13. Algebraic theories [29] are presented by operations and equa- 
tions. More precisely, an algebraic theory T = (£, Eq) consists of a signature 
£ = {O n | n £ N), where O n is the set of operations of arity n, and a set Eq of 
equations (between £-terms). They are a way to define monads and associated 
operations (see [20] for generalizations of equational theories that go beyond 
Set). In fact, an algebraic theory T induces a monoid M T in Endo(Set)/ (see 
Example 2.18), i.e. a finitary monad 4 on Set. Conversely, every monoid in 
Endo(Set) f is isomorphic to some Mt • The monad Mt has an algebraic oper- 
ation ox ■ {M T X) n — > M t X for each o € O n , where Ox is the interpretation 
of o in the free T-algebra over X. These operations can be collected in one alge- 
braic operation op A - : 'E(MrX) — > MtX , where £ is the finitary endofunctor 
S(X) = ]JO n x X n . 

n£N 

All monads for collection types (such as lists, bags, sets) arise from balanced 
finitary algebraic theories [30]. The monad in Example 3.8 is finitary when the 
set R has at most one element. The monads of Example 3.9 and 3.10 are 
finitary when the set S is finite. For instance, the monad MX = (X x S) s 
corresponds to the algebraic theory [36] given by an operation read of arity [S’], 
unary operations write s for s £ S, and equations 

t = read(f | i £ S) 

read ( read (fjj | j 6 S) \ i £. S) = read {t iti | * £ S) 

read(fj | i £ S) = read(writej(f*) | i £ S) 
writej(read(tj | j £ S)) = writ ej(tj): with i € S 

write* (writej(f)) = writej(t) withijjeS' 

The monads of Example 3.11 and 3.12 are always finitary. When M is the free 
monad on £, i.e. the monad induced by the algebraic theory T = (£, 0) , one 
can associate to M two other operations 

• elimx : X Y,X x x4:fe — > x MA captures initiality of MA among the £- 
algebras over A, namely elim A (a!, /) is the unique £-homomorphism /* 
from £(MA) -^4> MA (the free algebra over A) to £X — X such that 
/* o ret A f = /. elim generalizes bind'^^ (see the try construct in [37]), and 
usually cannot be presented as an //-operation. 

• case Y : MA x X A x — > X does case analysis on MA, which is 

isomorphic to A + £(MA). The instance of case obtained by replacing X 

with MX, i.e. case* : MA x {MX) A x {MX)^ mjV > > MX, can be 

presented as an //-operation for HNX = NA x (NX) A x {NX)^ MA \ 
provided the M in contravariant position is fixed. 


bn Set eve 
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4. Monoid Transformers 

This section introduces a taxonomy of monoid transformers in the setting of 
a monoidal category £ and gives examples of monoid transformers motivated by 
the incremental approach to monadic semantics. The main motivation for the 
taxonomy are the solutions to the lifting problem of Section 5, which depend 
on where a transformer fits in the taxonomy. 

The minimum requirement on a monoid transformer T is to map a monoid 

M £ Mon(£) to a monoid TM (and a monoid morphism M > TM). 

The maximum requirement is when the monoid transformer T is induced by 
a monoidal endofunctor T on £. In the rest of this section we call monoid 
transformers simply transformers. 

Definition 4.1 (Monoid Transformers). Let £ be a monoidal category, and 
M. be the category Mon(£) of monoids in £, then 

In 

1. A basic transformer (T, in) is a 2-cell \M\ -IJ. in M (in the 2-category 

of categories), where \A4\ is the discrete sub-category of M and In is the 
inclusion functor 

Id 

2. A covariant transformer (T, in) is a 2-cell M. 1) in M. 

T > 

3. A functorial transformer is a covariant transformer (T, in) and a 2-cell 

Id 

£ JJ- in £ such that U oT = T oU and U(\n_) = \nu(_}, i.e. 

T > 

Id Id 

> U U > 

M l)in M >£=M >£ D in £ 

lit > ~'¥~’ > 


Id 

4. A monoidal transformer is a 2-cell £ 1J. in £ (in the 2-category of 

T 

monoidal categories), i.e. T is a monoidal functor and in is a monoidal 
natural transformation. 

Proposition 4.2. The following implications on transformers hold: 
monoidal => functorial => covariant =>■ basic. 


Proof. Immediate from the definitions and Theorem 2.6 
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Remark 4.3. Also the monad/theory combinations proposed in [27, 15] have 
a natural generalization in the setting of a monoidal category, namely a monoid 

combination is a bifunctor ®c : At x At > At, which makes M. into a 

monoidal category with I as unit. Since I is the initial monoid, one can define 


a pair of 2-cells M. x Af JJ. in,; At for i = 1,2. Thus, every monoid M 

0c 

induces a covariant transformer T(-) = M Cdc — , by fixing the first monoid in 
the combination. However, there are functorial transformers, which are not of 
the form M Qc — , for any choice of 0c and M. A simple counter-example in 
the category M of finitary monads on Set (or equivalently algebraic theories) is 
the list transformer TMX = yX'.M( 1 + X x X'), described in Example 4.9. At 
the level of algebraic theories (see Example 3.13) the list transformer T maps a 
presentation (£, Eq) to the presentation obtained by adding to (£, Eq) a binary 
(infix) operation @, a constant nil, and the equations 

nil@£ = x = x@nil (x@y)@z = x@(y@z ) 
op(aq|i e n)@y = op(xi@y\i e n) for any op e E of arity n 

We are unware of simple conditions on 0c and M implying that the induced 
transformer T(— ) = MCdx— is functorial or monoidal. Such implications would 
be of interest to extend our lifting results to combinations. □ 

4-1. Examples of Transformers 

We give examples of strong monad transformers, i.e. monoid transformers 
on the monoidal category Endo(C) s with C cartesian closed, and say where they 
fit in the taxonomy. Some examples require additional assumptions on C and 
use a monoidal sub-category of Endo(C).,. 

• The transformers TMX = MX S (Example 4.5), TMX = M(X x S) s 
(Example 4.6) and TMX = M{X x W) (Example 4.7) are monoidal; 

• The transformer TMX = yX'.M (X + SX') (Example 4.8) is functorial, 
but not monoidal. By a suitable choice of S this transformer becomes 
TMX = M (X + E) for exceptions, TMX = fiX'.M(X — X') for resump- 
tions, TMX = (j,X'.M(X + V x X' + X' v ) for interactive I/O. 

• The transformer TMX = yX',M( 1 + X x X') (Example 4.9) is covariant, 
but not functorial. 

Finally, Example 4.10 gives monoid transformers on Endo(Set), showing that 
the implications in Proposition 4.2 cannot be reversed. 

As already done for strong monads (see Definition 3.6), we borrow from 
Haskell the definition of strong endofunctor on a cartesian closed category C, 
and freely use simply typed lambda-calculus as internal language to denote 
objects and maps in C. 
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Definition 4.4 (Strong Endofunctor) . A strong endofunctor on a cartesian 
closed category C is a pair F = (T, map F ) consisting of 

• a map F : \C\ > \C\ on the objects ofC 

• a family map x >Y '■ Y x x FX — > FY of maps with X,Y € C 
such that for every u: FA, f : B A and g : C B : 

map F )A (idA, u) = u 

™PA,c(9°f, u) = m aPs,c(5, map^ >B (/, u)) 

A strong natural transformation r : F ■ — jJggG is a family tx '■ FX GX 
of maps with X e C such that for every u : FA and f : B A 

r B (map^ B (/, «)) = map^ >B (/, t a {u)) 

Example 4.5. The transformer (T, in) for adding environments in S € C is 
defined as follows: 

• T maps a strong monad M to the strong monad N given by 

NX = MX S 
ret'x'(x) = As : S. ret* (x) 
bind x, Y (c,f) = \s:S.bind% Y (cs,\x:X.fxs) 

• in maps a strong monad M to r : M > TM given by 

t x (c : MX) = Xs : S.c 

This transformer is monoidal. More precisely, it is induced by the following 
monoidal functor T = (T. 0|. 0) and monoidal natural transformation in 

• T maps a strong functor F to the strong functor G given by 

GX = ( FX) S 

map x t Y(fi u ) = As : S. map x,y{fi us ) 

and maps r : A — A to TV : tA — TF 2 given by 
(Tt) x (u) = Xs:S.t x (us) 

• : Id T(ld) and 0^ : TF 2 o TF X T(F 2 o A) are 

<hx(x:X) A s-.S.x 

0 #2)#iiX (n:T 2 ((F 1 X)A S ) = 

As : S.map^ iX)S FiX (Xf : (F 1 X) s ./s, us) 

• in p:F 0j> TF is in Px {u : FX)= Xs:S.u 
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Example 4.6. The transformer (T, in) for adding side-effects on S £ C is 
defined as follows: 

• T maps a strong monad M to the strong monad N given by 

NX = M(X x S) s 
ret£ (a) = A s:S. retf xS (x, s) 

bind x, Y (c,f) = \s:S.b\nd% xStYxS {cs,\(x:X,s':S).fxs') 

• in maps a strong monad M to r : M — given by 

Tx(c : MX) = As : S'. b\nd^ XxS {c, Xx : X. ret X xs( x i s )) 

Also this transformer is monoidal. More precisely, it is induced by the following 
monoidal functor T and monoidal natural transformation in 

• T maps a strong functor F to the strong functor G given by 

GX = F(X x S) s 

ma Px,y(/> u ) — Xs : S. mapxxS,Yxs(^( x : X, s' : S). (f x, s'), u s) 
and maps r : F\ — F 2 to Tr : TF\ — TF 2 given by 
(Tt) x (u) = X s:S.T X xs(us) 

• : Id — % T(ld) and 0^. j# . : TF 2 o TF 1 — T(F 2 o F x ) are 

01 x{x : X) = As : S. (x, s) 
0 #2A >:(F 2 ((F 1 Xx^xS)) s ) = 

As : S.map^ (;fxS)S><S;Fi(XxS) (A(/ : FffX x S) s ,s' : S).fs', us) 

• in^, : F — TF is in p x (u : FX)=Xs : S. map^ XxS (Ax : X. (x, s), u) 

□ 

Example 4.7. The transformer (T, in) for adding complexity on a monoid 
(W, 0, +) in C is defined as follows: 

• T maps a strong monad M to the strong monad N given by 

NX = M(X x W) 
ret x (x ) = ret% xW (x,0) 

bind x , Y {c,f) = bind M (c, A(x : X,w : W). 

bind M (fx, X(y : Y, w' : W). ret M (y, w + w')) ) 

• in maps a strong monad M to r : M given by 

t x {c:MX) = b\nd^ X xw(c, Xx : X. ret% xW {x,0)) 


Also this transformer is monoidal (we skip the details). 
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Example 4.8. In this example we need additional assumptions on C, namely 



(we write /i + for the action of + on maps), and 


• existence of initial algebras olf : F(pX. FX^jes^ $X. FX for every 
strong endofunctor F. 

In order to satisfy the last assumption one could take as C the cartesian closed 
category Va of partial equivalence relations, and replace Endo('P J 4 ) s with the 
more restricted category Endo/Tbi),. of realizable endofunctors and realizable 
natural transformations (see Example 2.20). Alternatively, one could take the 
category of finitary endofunctors (see Example 2.18) or the category of contain- 
ers [1] which are also closed under initial algebras. Given a realizable endofunc- 
tor S, the transformer (T, in) for adding S-steps is defined as follows: 

• T maps a realizable monad M to the realizable monad N given by 


NX 

re t'x(*) 

step* 
step*(u) 
bind* y (c, /) 


pX'. M{X + SX') 
a ( ret x+s(nx) 0 n l x )) 
S(NX ) — > NX 

a ( ret X+5(iVX)( inru )) 

he 


where NX - - NY is the unique M(X + S— )-algebra morphism from 
the initial algebra to (3 : M(X + S(NY)) ‘^ik> NY given by 


/3(c) — a(bind* +S ( JVF ) ,v+s(jvv) ( c , a 1 ° [/> ste Py])) 


• in maps a realizable monad M to r : M > N = TM given by 

t x (c : MX) = a(bind x,x+s(nx){c, a -1 o ret£)) 

This transformer is functorial. More precisely, the underlying realizable endo- 
functor transformer (T, in) is 

• T maps a realizable functor F to the realizable functor G given by 

GX = pX'. F(X + SX') 
ma Px,v(/> u ) = hu 
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where GX h > GY is the unique F(X + ,S'— j-algebra morphism from the 
initial algebra to {3 : F(X + S(GY)) — > GY given by 

P(u) = &(™aPx+S(GY),Y+S(GY)(f + id,S(GV), u)) 

and maps r : P% — F 2 to Tt : TFi = Cr% G 2 = TF 2 given by 

(Tr) x (u) = hu 

where G\X — * > G 2 X is the unique F-\ (X + S— )-algebra morphism from 
the initial algebra to {3 : F\(X + S(G 2 X)) — > G 2 X given by 

/?(u) = a(T X+ s(G 2 x)(u)) 


• in maps a realizable endofunctor F to r : F > G = TF given by 

t x (u:FX) = a(mapJ x+s(GX) (inl, u)) 


This transformer may fail to be monoidal (see Example 4.10). □ 


Example 4.9. We define the list transformer, which needs additional assump- 
tions, like those identified in Example 4.8. Therefore, we take as C the cartesian 
closed category Va of partial equivalence relations, and replace Endo('P J 4 ) s with 
the more restricted category Endo^^r of realizable endofunctors and realizable 
natural transformations. The list transformer (T, in) is defined as follows: 

• T maps a realizable monad M to the realizable monad N given by 


NX 

nil* 

nil* 

consx 

consx(a:, l ) 
ret^(x) 
bind^ y (c, /) 


[iX'. M( 1 + XxX') 
NX 

a ( ret l+JCxJVx(' n l *)) 

Xx NX — > NX 
0 ‘(’ret^ I +XxNX (\m(x,l))) 
cons* (z, nil*) 
he 


where NX — > NY is the unique M(1 + X x — )-algebra morphism from 
the initial algebra to (3 : M(1 + X x NY) — > NY given by 

{3(c) = a(bind^ XxJV y )1+ y xiV y(c, a 1 o [nily, X(x, l). app Y ((f x),l)])) 

with NX A3PP S (NX) nx the unique M( 1 + X x — )-algebra from the 
initial algebra to A (3 : M(l + X x (NX) nx ) (NX) NX given by 

(3(c,l) = a(bmd™ +Xx 

(nx) nx ,i+xxnx( c > a 1 0 


[n\\ x ,X(x,f).cons x (x,fl)])) 



32 


To prove that ret' v and bind' V satisfy the equations in Definition 3.6, one 
can use the following properties of nil x , cons x and app x 

apPx(nilx) 0 = l = app x (Z,nil x ) 

app x (cons x (x,Z 1 ),Z 2 ) = cons x (x, app x (Zi, Z 2 )) 
app x (app x (Zi,Z 2 ),Z3) = app x (Zi,app x (Z 2 ,Z 3 )) 

• in maps a realizable monad M to r : M — |> N = TM given by 

t x (c : MX) = a(bind x 1+XxJVX (c, a -1 o ret x )) 

This transformer is covariant, but not functorial. In fact, take the endofunctor 
MX = X x N, where N € C is the natural numbers object. Consider the two 
monoid = (TV, 0, +) and ZV 2 = (N, 1, *) with N as carrier, they induce differ- 
ent monads Mj with M as underlying endofunctor. The natural transformations 

i n A - f : MX > TMX are different, and so they are not determined by the 

underlying endofunctor (as required in the definition of functorial transformer). 

We conjecture that the list transformer is a quotient of the binary tree trans- 
former, which adds B-steps for the functor B{X) = 1+X x X (see Example 4.8). 
A more precise statement requires the equational systems of [11] . □ 

Example 4.10. We give four (strong) monad transformers on Set, which show 
that the implications in Proposition 4.2 cannot be reversed. When convenient, 
we use the fact that every endofunctor /monad on Set is strong (see Section 3.1). 

1. The transformer (T, in) for adding continuations is defined as follows, T 
maps a strong monad M to the strong monad N of continuations in MR 
(see Example 3.8) 

NX = (MR)^ mr)X) 

ret x (x) = Xk:(MR) x .kx 

bind£y (c,/) = Xk : (MR) Y .c(Xx : X. f xk) 

and in maps M to the morphism r : .1/ 'v=i> TM given by 

t x (c : MX) = Xk : ( MR) X . bind^ )fi (c, k) 

This transformer is not covariant, because M is used in contravariant 
position in NX. 

2. Given a strong monad M, we say that a computation c : MX is idem- 
potent when c = c; c where ci; c 2 = bind x x (ci, Ax : X. c 2 ). 

The transformer (T, in) making computations idempotent is defined 
as follows, T maps a strong monad M to the smallest quotient monad (see 
Example 2.13) generated by the family of relations 


Rx = {(c, c; c) | c e MX} 
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and in^ is the epimorphism from M to the quotient monad. 

This transformer is covariant, because Tx(c;c) = r Y (c): tx(c) : NX for 

any strong monad morphism r : M > N and c : MX, but it is not 

functorial. In fact, there are two monads M and N of complexity (see 
Example 3.11) with the same underlying endofunctor F(-) = — x bool, 
with bool the set of booleans, such that TM = M and TN = Id: 

• M is the strong monad induced by the monoid (bool, false, or) in Set. 
Since this monoid is idempotent, all computations in MX are already 
idempotent, therefore TM = M. 

• N is the strong monad induced by the monoid (bool, false, xor) in Set. 
Since xor(true, true) = false, the quotient monad TN must identify 
(x, false) and (x, true) for any x : X (and this suffices to make all 
computations idempotent). 

3. The transformer (T, in) for adding exceptions in E is defined as follows, 
T maps a strong monad M to the strong monad N given by 


NX 
ret^(x) 
thrown (e : E) 
bind^ jF (c, /) 


M(X + E) 
ret x + e ^ x ) 

r etf +E (inre) 

bind x+e,y+e( c i [/• throwx]) 


and in maps M to the morphism r : M f2$ TM given by 
Tx(c : MX) = bind Y) x+b( c ) re fx) 

This transformer is functorial (since it is the instance of Example 4.8 with 
SX = E), more precisely T maps an endofunctor F to the endofunctor 
F(— + E), but it is not monoidal. In fact, if it were monoidal, then 
there should be a natural transformation 


<t>G,F : G(F(- + E) + E) — G(F(- + E)). 

However, this is impossible, when E = 1, GX = X and FX = 0. 

4. The identity transformer, which maps M to itself, is monoidal. 


□ 


5. Transformers and Liftings 

Theorem 3.4 gives a unique way to lift algebraic operations along any monoid 
map. Therefore, given a basic transformer (T, in) and a monoid M, every alge- 
braic operation A®M ° P > M for M can be lifted along in . In this section, we 
exploit the structure of monoidal and functorial transformers to provide liftings 
for more general classes of operations, including first-order operations. 

Going back to Fig 1 on page 3, when one moves from top to bottom the 
operations become more general, but the lifting theorems need additional as- 
sumptions on the transformers or the monoidal category £. 
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Remark 5.1. For covariant transformers we have no lifting result which im- 
proves over Theorem 3.4. However, for specific transformers, one may find 
liftings which are ad-hoc in the transformer, but uniform in the operations (e.g. 
for the list transformer there is a simple way to lift any first-order operation). 
In general one should first try to exploit general lifting results, only when these 
results are not applicable, one should resort to more ad-hoc methods. □ 

Theorem 5.2 (Monoidal Lifting). 7/(T, in) is a monoidal transformer, with 

T = (T, 0| , 0) , and op : A ® M > M is a first-order operation for M, then 

there is a lifting of op along in^ given by 

op = A®TM TA®TM 4> T(A ® M) T ^ > TM (5.1) 

More generally, ifH(-) = (A®U(—))®F, with A, F € £, and op : HM — >■ M 
is an H -operation for M, then there is a lifting op of op along in^ given by 

(: TA <g> TM) ® F ^ ' n S T(A ®M)®Tf' — T((A ® M) <g> F) 

I 

(in^ (g ) id) (g) id T'(op) (5-2) 


(A ® TM) (g )F > TM 

op 

Proof. The first-order case reduces to the more general case when F = I. We 
need to show that diagram (3.2) commutes, i.e. opo((id(g)inM)<S>id) = inM°op. 
We expand the definition of op and prove that the following diagram commutes 



1. because in is a monoidal natural transformation 

2. because in is a natural transformation. 
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5.1. Functorial Lifting 

We now focus on functorial transformers. Before proving the main result 
(Theorem 5.5), we need to establish two lemmas. 

Lemma 5.3 (Derived Lifting). Given a functorial transformer (T, in), two 

H -operations op 2 : HN — and op 2 : H(TN ) > TN with op 2 a lifting 

of op 2 along in^, a monoid map t : M — and a map f : JiTvt, — > M, let 

o Pl = HM Ht > HN ° P2 > N M (5.3) 

op! = H(TM) H ^ Tt l H(TN) ^ (5.4) 

then op! is a lifting of op 1 along in^. 

Proof. The claim amounts to the outer square of the commuting diagram 


H(TM) - 


\ 


(1) 

_ / 

H(TN) N 

I t 

in*) (2) ff(in^) (3) in„ (2) in „ 

HN > N 

yl °P2 \ 

(1) < 


1. by definition of opj and op! 

2. because in is a natural transformation 

3. because, by assumption, op 2 is a lifting of op 2 along in ^. 


□ 

Consider Lemma 5.3 when H(-) = A 0 U (— ) and op 2 : A <S) N $q£E ;> ■ N 
is algebraic for N, then one can take as op 2 the algebraic lifting of op 2 along 
in^ (see Theorem 3.4). When £ has exponentials, we show that every op, : 
A®M — > M can be expressed (as in Lemma 5.3) using an algebraic op 2 , and 
thus opj has a lifting along i n . 
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Lemma 5.4 (Additional properties of KM). If £ has exponentials, M is a 
monoid and op : A ® MjSSi> M is a first-order operation for M, let 

from ^(/:M m ):M = fe (5.5) 

op (s : A, f : M m ) : M m = \x : M ,op(s , f x) (5.6) 

then the following claims hold (where KM and to ^ are given in Example 2.11) 

(a) M — M m from M> M is the identity on M 

(b) op : A ® M m — > M m is algebraic for KM and 

op = A®M^% A®M m 

(c) op algebraic for M implies op is the algebraic lifting of op along to^. 


Proof. Let Eq be the set of equations saying that M is a monoid (Defini- 
tion 2.7) and Eqop be Eq plus (3.1) saying that op is algebraic for M, then the 
claims amount to the equations (we drop the type M of bound variables) 

(a) x: M \- Eq from J Q-(to J q-(a;)) =x:M 

from J ^(to J q-(a;)) by definition 

(Xx'.x ■ x'j e by reduction ((3. — >) 

x-e by (2.12) in Eq 

x 


(b) s : A,x\,x' 2 : M M \- Eq Cm(op(s, x'f), xlf) = op(s, x' 2 )) : M M 

Cm(op(s, x'i), x' 2 ) by definition 

Aa;.(Ax.op(s,x , 1 x)) ( x' 2 x) by reduction (ft. — >) 

Aa;.op(s, ( Xx.x \ (x' 2 x)) x) by definition 

op(s,c M (a:i,a; / 2 )) 

s: A,x: M \- Eq from M (op(s, to^s))) = op(s,x) : M 
from J ^(op(s, tOjQ^a;))) by definition 

(Aa/.op(s, ( Xx'.x ■ x') x')) e by reduction (/ 3 . — >) 

opfs, x ■ e) by (2.12) in Eq 

op (s,x) 


(c) s : A, x : M \- Eqop op(s,to^(x)) = to J q(op(s, x)) : M M 

op(s, to^(a;)) by definition 

Ax , .op(s, ( Xx'.x ■ x') x')) by reduction (f3. — >) 

Ax , .op(s,x • x') by (3.1) in Eqop 

Xx'.op(s,x) ■ x' by definition 

t°,v,(op(.s.a:)) 


□ 
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Theorem 5.5 (Functorial Lifting). If(T, in) is a functorial transformer, and 
op : A 0 M M is a first-order operation for M, then there is a lifting op 
of op along in^ given by 


id 0 Tito.-.) 

op = A0TM A 0 T(M m 


.. T(from,>) 

1 P rM (5.7) 


where op is defined in (5.6) and op* is the unique algebraic lifting of op along 
iri(K m) given by Theorem 3.f. 


Proof. The lifting op is the op 2 given in Lemma 5.3 when one takes N = KM, 
op 2 = A0N — *> N, thus op 2 is algebraic for N (by Lemma 5.4), op 2 the unique 
algebraic lifting A0(TN) — TN of op 2 along in ^, t = toy p / = from Ap and 
thus opj = op (again by Lemma 5.4). □ 


5.2. Coincidence of Liftings 

For some pair operation-transformer two (or more) of the lifting theorems 
summarized in Fig 1 are applicable. For instance, if op is an algebraic operation 
for M and (T, in) is a monoidal transformer, then one can apply both the 
algebraic lifting (Theorem 3.4) and the monoidal lifting (Theorem 5.2). We 
prove that when two lifting theorems are applicable, they yield the same result. 

Theorem 5.6 (Algebraic/Monoidal). // (T, in) is a monoidal transformer 
and op : A 0 M M is algebraic for M, then the monoidal lifting (Theo- 
rem 5.2) and the algebraic lifting (Theorem 3.f) of op along in^ coincide. 

Proof. Equation (3.3), saying that op is algebraic for M = (M, e, m), amounts 
to op = m o (op' 0 id), where op'(.s : A) : M = op(s, e). The coincidence follows 
by the commuting diagram below, where the top path from A 0 TM to TM is 
the monoidal lifting of op, and the bottom path is the algebraic lifting of op along 
in ^ M — > TM (the multiplication of TM is (Tm) o (f>, see Theorem 2.6) 

A 0 TM mA0 ' d > TA 0 TM T(A 0 M) 

op' lid (1) T(op') L T’(id) (2) T(op'L id) 

'4'- , 'Jv 

M 0 TM > TM 0 T.\f \ Mt(M 0 M) 

in M 0 id (f> 

1. because in is a natural transformation 

2. because ^ is a natural transformation 

3. because op = m o (op' 0 id) and functoriality of T. 



□ 
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Theorem 5.7 ( Algebraic/Functorial) . If (T, in) is a functorial transformer 
on a monoidal category with exponentials and op : A® M M is alge- 

braic for M, then the functorial lifting (Theorem 5.5) and the algebraic lifting 
(Theorem 3.f) of op along in^ coincide. 

Proof. Since op is algebraic for M, we can define the following algebraic liftings 

• op® : A 0 TM > TM the algebraic lifting of op along i n 

• op : A 0 M m > M M the algebraic lifting of op along to^, which is 

given by (5.6) of Lemma 5.4 

• op # : A 0 T(M m ) |&§|(M JVf ) the algebraic lifting of op along in (KM ). 

The coincidence follows by the commuting diagram below, where the bottom 
path from A 0 TM to TM is the functorial lifting of op given by Theorem 5.5 


A 0 TM ° ptl > TM 



1. because, op 11 is the unique algebraic of op® along I^to^), in fact 

• op® is the unique algebraic lifting of op along i n A/ 

• op 1 * is the unique algebraic lifting of op along in( KM ) o to A/ 

• r ( t0 M) ° in M = in (KM) ° to^ by naturality of in 

2. by Lemma 5.4(a) and functoriality of T. 


□ 

Theorem 5.8 (Functorial/Monoidal). If (T, in) is a monoidal transformer 
on a monoidal category with exponentials and op : A 0 M ■ >'. . riffi M, then the 
functorial lifting (Theorem 5.5) and the monoidal lifting (Theorem 5.2) of op 
along in^ coincide. 

Proof. The functorial lifiting of op is given by 

A 0 TM ld ® T ^°mI_ a m ^ T(M m ) TM 

where op 11 is the algebraic lifting of op along in( KM ) (see Theorem 5.5), or equiv- 
alently (by Theorem 5.6) op 1 * is the monoidal lifting of op along in( K M)> he. 


5p“ = A 0 T(M m ) ® > 7 A 0 T(M m ) 7 (,1 0 M v ) T< '° R l T(M V ) 
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The coincidence follows by the commuting diagram below, where the top path 
from A 0 TM to TM is the monoidal lifting of op, and the bottom path is the 
functorial lifting of op 


id 0 T(to*) T(id) 0 T(to*) (1) T(id 0 to* 

A 0 T(M m ) ^ id > TA 0 T(M m ) T{A 0 M m 


t 

(2) T(from* 


T( op)' 


■ T(M m 


1. because 0 is a natural transformation 

2. by Lemma 5.4(b) and functoriality of T. 


□ 


6. Conclusions 

2-categories versus monoidal categories. Category-theoretic notions, such as 
monads and adjunctions, can be recast in the setting of a 2-category [21] , in fact 
for monads 2-categories with one object suffice. A 2-category C with one object 
correspond to a strict monoidal category £, and the correspondence induces a 
bijection between monads in C and monoids in £. Moreover, it is natural to 
drop the strictness assumption on £ (or equivalently replace 2-categories with 
bicategories [6]). Therefore, the move from monads to monoids is a natural 
generalization. What is not obvious, is the possibility of addressing the lifting 
problem (for monad transformers) at this level of generality, indeed this is the 
main novelty w.r.t. [17]. 

Relation with the companion paper [17]. The main results in the companion pa- 
per are instances of the algebraic and functorial lifting (Theorems 3.4 and 5.5) 
for the monoidal category £ Fu > of endofunctors expressible in Flo (see Exam- 
ple 2.19). Theorem 5.5 is not applicable to £fu, because it does not have ex- 
ponentials (in addition some claims in [17] are wrong). However, this problem 
is overcome by replacing £p u with Endo(7V^) r of Example 2.21. Finally, the 
companion paper works with expressible monad transformers, a proper subset of 
the monoid transformers on £ F u>, which are more amenable to implementation 
in a programming language. 

Generalizations of Algebraic Theories. [11] has proposed a notion of (iterated) 
equational system on a category C, which provides a significant generalization of 
algebraic theories and constructions of free algebras. The definition of functorial 
term of arity A given in [11] is closely related to the definition of algebraic 
operation of arity A for a monoid in the monoidal category of endofunctors 
on C (this is further evidence that the terminology “algebraic operation” is 
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appropriate). In fact, if the category of algebras for an (iterated) equational 
system is equivalent to the category C M of Eilenberg-Moore algebras for the 
monad M, then there is a bijective correspondence 

T(MX .^> X) = AX MX X 

op x = AX A{MX) 1 ^ MX 

between natural transformations op : A .'jk-Al- i.e. algebraic operations of ar- 
ity A for M, and functorial terms T of arity A, i.e. functors T : C M — > A-Alg 
such that C A/ U > C = C Af ’ > A-Alg U > C. This correspondence suggests 
a reinterpretation (and generalization) of the notions introduced in [11]: 


Equational Systems [11] 

Monoidal Category £ 

iterated equational system (IES) 

monoid M € Mon(£) 

functorial signature F (IES with n = 0) 

object F e £ 

category F-Alg of F-algebras 

free monoid F* over F 

functorial term T of arity D 

map op : D > U(M) 

adding an equation to an IES 
IES h Ti = T 2 : D 

taking a quotient of M 
opi „ 

D > M - -> N 

op 2 


Future Work. A topic of future work is to investigate the use of free construc- 
tions for equational systems in defining strong monad transformers that add to 
a pre-existing monad new operations satisfying certain equations (Example 4.9 
should be an instance of this). Another line of research, already mentioned in 
the Introduction, is the use of monoid transformers for an incremental approach 
for arrows [14] (viewed as monoids [13]) or other generalizations of monads 
proposed in the literature. 

Acknowledgements.. We would like to thank the anonymous referees for their 
constructive criticisms and suggestions. 
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